From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 1 May 1993 03:09:16 +0000 (+0000)
Subject: (vc-revert-buffer1): Fix format of compilation-error-list.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~96443
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=a1bda481b9df6e10879d85ed3020069f626fc58f;p=emacs.git

(vc-revert-buffer1): Fix format of compilation-error-list.
---

diff --git a/lisp/vc.el b/lisp/vc.el
index 434f2543148..2e0fa62eac0 100644
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -282,10 +282,10 @@ the master name of FILE; this is appended to an optional list of FLAGS."
 					  (buffer-error-marked-p nil))
 				      (while (and errors
 						  (not buffer-error-marked-p))
-					(and (markerp (car (cdr (car errors))))
+					(and (markerp (cdr (car errors)))
 					     (eq buffer
 						 (marker-buffer
-						  (car (cdr (car errors)))))
+						  (cdr (car errors))))
 					     (setq buffer-error-marked-p t))
 					(setq errors (cdr errors)))
 				      (if buffer-error-marked-p buffer)))